
***************************************** Results from main experiments
****Figure 1 (NOTE: for the "just" conditions (B and E) "eastland_just_combined_dummy" equals 1 if subjects in the "just" conditions (B and E) rated Eastland's counter-attack [eastland_counter_just_dummy] justified and 0 if unjustified; for the "unjust" conditions (A,C and D) it equals 1 if subjects rated Eastland's attack [eastland_attack_just_dummy] justified and 0 if unjustified)  
mean  eastland_just_combined_dummy, over(EIA_treatments), [pweight= expweight ], coeflegend
test _b[c.eastland_just_combined_dummy@15bn.EIA_treatments] = _b[c.eastland_just_combined_dummy@16.EIA_treatments]
test _b[c.eastland_just_combined_dummy@15bn.EIA_treatments] = _b[c.eastland_just_combined_dummy@16.EIA_treatments]
test _b[c.eastland_just_combined_dummy@19bn.EIA_treatments] = _b[c.eastland_just_combined_dummy@18.EIA_treatments]
test _b[c.eastland_just_combined_dummy@15bn.EIA_treatments] = _b[c.eastland_just_combined_dummy@17.EIA_treatments]



****Figures 2, 3 and 4
** means for all treatment groups
mean  soldier_ethical_dummy , over( EIA_treatments), [pweight= expweight ], coeflegend

** tests for figure 2
test  _b[c.soldier_ethical_dummy@15bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@16bn.EIA_treatments]

** tests for figure 3
test  _b[c.soldier_ethical_dummy@15bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@16bn.EIA_treatments]
test  _b[c.soldier_ethical_dummy@15bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@16bn.EIA_treatments]
test  _b[c.soldier_ethical_dummy@18bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@19bn.EIA_treatments]
test  _b[c.soldier_ethical_dummy@16bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@17bn.EIA_treatments]
test  _b[c.soldier_ethical_dummy@16bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@18bn.EIA_treatments]
test  _b[c.soldier_ethical_dummy@16bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@19bn.EIA_treatments]

** tests for figure 4
test  _b[c.soldier_ethical_dummy@15bn.EIA_treatments] =  _b[c.soldier_ethical_dummy@17bn.EIA_treatments]


****Figure 5
mean  leader_ethical_dummy soldier_ethical_dummy, over( EIA_treatments), [pweight= expweight ], coeflegend
test _b[c.leader_ethical_dummy@17.EIA_treatments] = _b[c.soldier_ethical_dummy@17.EIA_treatments]
test _b[c.leader_ethical_dummy@19.EIA_treatments] = _b[c.soldier_ethical_dummy@19.EIA_treatments]


****Figure 6 
mean  soldier_not_ethical_dummy soldier_prison_dummy soldier_execution_dummy leaders_prison_dummy, over( EIA_treatments), [pweight= expweight ], coeflegend
test _b[c.soldier_not_ethical_dummy@15bn.EIA_treatments] = _b[c.soldier_prison_dummy@15bn.EIA_treatments]
test _b[c.soldier_not_ethical_dummy@16bn.EIA_treatments] = _b[c.soldier_prison_dummy@16bn.EIA_treatments]
test _b[c.soldier_not_ethical_dummy@17bn.EIA_treatments] = _b[c.soldier_prison_dummy@17bn.EIA_treatments]
test _b[c.soldier_not_ethical_dummy@18bn.EIA_treatments] = _b[c.soldier_prison_dummy@18bn.EIA_treatments]
test _b[c.soldier_not_ethical_dummy@19bn.EIA_treatments] = _b[c.soldier_prison_dummy@19bn.EIA_treatments]


test _b[c.soldier_execution_dummy@15bn.EIA_treatments] = _b[c.soldier_prison_dummy@15bn.EIA_treatments]
test _b[c.soldier_execution_dummy@16bn.EIA_treatments] = _b[c.soldier_prison_dummy@16bn.EIA_treatments]
test _b[c.soldier_execution_dummy@17bn.EIA_treatments] = _b[c.soldier_prison_dummy@17bn.EIA_treatments]
test _b[c.soldier_execution_dummy@18bn.EIA_treatments] = _b[c.soldier_prison_dummy@18bn.EIA_treatments]
test _b[c.soldier_execution_dummy@19bn.EIA_treatments] = _b[c.soldier_prison_dummy@19bn.EIA_treatments]

test _b[c.leaders_prison_dummy@15bn.EIA_treatments] = _b[c.soldier_prison_dummy@15bn.EIA_treatments]
test _b[c.leaders_prison_dummy@16bn.EIA_treatments] = _b[c.soldier_prison_dummy@16bn.EIA_treatments]
test _b[c.leaders_prison_dummy@17bn.EIA_treatments] = _b[c.soldier_prison_dummy@17bn.EIA_treatments]
test _b[c.leaders_prison_dummy@18bn.EIA_treatments] = _b[c.soldier_prison_dummy@18bn.EIA_treatments]
test _b[c.leaders_prison_dummy@19bn.EIA_treatments] = _b[c.soldier_prison_dummy@19bn.EIA_treatments]

**** Soldiers Ethical and Soldiers Prison by death penalty support
mean soldier_ethical_dummy soldier_prison_dummy, over( EIA_treatments pro_DP_dummy ), [pweight= expweight ], coeflegend


***************************************** Results from additional June 2018 survey
**** "In war, the strong do whatever they can and the weak do whatever they must. Ethics just don't apply."
mean no_morals_binary [pweight=weight]

**** "After a war, victors have a right to impose their own form of justice on the losers."
mean victor_justice_binary [pweight=weight]
